home *** CD-ROM | disk | FTP | other *** search
/ Erect Magazine 15 / Erect Magazine 15.iso / mac / P_Bro.DIR / 00045.ls < prev    next >
Encoding:
Text File  |  1996-07-11  |  317 b   |  13 lines
  1. on exitFrame
  2.   global slidewait_g
  3.   if the ticks < slidewait_g then
  4.     go(the frame)
  5.   else
  6.     set tempcur to integer(field "PhotoCUR_T") + 1
  7.     if tempcur > integer(item integer(field "PhotoGRP_T") of field "PhotoMAX_T") then
  8.       set tempcur to 1
  9.     end if
  10.     put tempcur into field "PhotoCUR_T"
  11.   end if
  12. end
  13.